2 POKE55,0:POKE56,157:CLR
5 POKE53280,9:POKE53281,9
10 PRINT"[147][155][142]        LISTER FOR ASCII PRINTER
15 [153]"DEF        VALVALVALVALVALVAL VALVALVAL VALVALVALVALVAL VALVALVALVALVALVALVAL
20 PRINT,"[129]      BY
25 [153],"STEVEN DARNOLD
30 PRINT,"P.O. BOX 201
35 [153],"ALEXANDRA, NEW ZEALAND
70 FORI=40192TO40743
80 READX:POKEI,X
90 NEXT
100 DATA169,0,133,183,133,185,169,4
101 DATA133,184,133,186,32,192,255,166
102 DATA184,32,201,255,165,43,166,44
103 DATA133,249,134,250,32,63,157,133
104 DATA247,32,57,157,133,248,208,28
105 DATA169,13,32,210,255,32,210,255
106 DATA169,4,32,195,255,32,231,255
107 DATA96,230,249,208,2,230,250,160
108 DATA0,177,249,96,32,225,255,240
109 DATA223,169,0,133,2,32,57,157
110 DATA170,32,57,157,32,205,189,169
111 DATA32,32,210,255,169,0,32,210
112 DATA255,32,57,157,208,12,169,13
113 DATA32,210,255,165,247,166,248,76
114 DATA24,157,201,34,208,8,165,2
115 DATA73,1,133,2,169,34,166,2
116 DATA208,39,170,16,217,201,255,240
117 DATA213,41,127,160,255,170,240,9
118 DATA200,185,158,160,16,250,202,208
119 DATA247,200,185,158,160,8,41,127
120 DATA32,210,255,40,16,243,76,92
121 DATA157,201,34,240,177,201,128,176
122 DATA4,201,32,176,169,169,60,32
123 DATA210,255,32,63,157,160,72,217
124 DATA228,157,240,13,136,16,248,41
125 DATA127,32,210,255,169,62,76,94
126 DATA157,190,45,158,232,189,118,158
127 DATA8,41,127,32,210,255,40,16
128 DATA243,76,204,157,17,29,145,157
129 DATA147,19,18,146,144,5,28,159
130 DATA156,30,31,158,129,149,150,151
131 DATA152,153,154,155,148,20,141,14
132 DATA142,133,137,134,138,135,139,136
133 DATA140,161,162,163,164,165,166,167
134 DATA168,169,170,171,172,173,174,175
135 DATA176,177,178,179,180,181,182,183
136 DATA184,185,186,187,188,189,190,191
137 DATA192,219,220,221,223,255,1,3
138 DATA5,7,10,12,15,18,21,24
139 DATA27,30,33,36,39,42,45,48
140 DATA52,56,60,64,68,72,75,78
141 DATA81,86,91,93,95,97,99,101
142 DATA103,105,107,109,111,113,115,117
143 DATA119,121,123,124,126,128,130,132
144 DATA134,136,138,140,142,144,146,148
145 DATA150,152,154,156,157,159,161,163
146 DATA165,167,168,169,171,172,100,238
147 DATA114,244,117,240,108,229,99,108
148 DATA242,104,237,114,118,243,111,102
149 DATA230,98,108,235,119,104,244,114
150 DATA101,228,99,121,238,112,117,242
151 DATA103,114,238,98,108,245,121,101
152 DATA236,111,114,225,98,114,238,112
153 DATA105,110,235,103,114,97,177,103
154 DATA114,97,178,108,103,114,238,108
155 DATA98,108,245,103,114,97,179,105
156 DATA110,243,100,101,236,114,101,244
157 DATA108,111,119,101,242,103,114,97
158 DATA112,232,102,177,102,178,102,179
159 DATA102,180,102,181,102,182,102,183
160 DATA102,184,42,203,42,201,42,212
161 DATA42,192,42,199,42,171,42,205
162 DATA42,220,220,42,206,42,209,42
163 DATA196,42,218,42,211,42,208,42
164 DATA193,42,197,42,210,42,215,42
165 DATA200,42,202,42,204,42,217,42
166 DATA213,42,207,192,42,198,42,195
167 DATA42,216,42,214,42,194,170,171
168 DATA42,173,173,42,170,0,0,0
200 PRINT"[147][204][201][211][212][201][206][199][160][210][207][213][212][201][206][197][160][206][207][215][160][210][197][211][201][196][197][211][160][194][197][212][215][197][197][206]
210 [153]"$9STR$00 ATN(null)STR$ $9ASC27.  (null)(null)VAL LIST(null)(null)(null) 40192   FOR
220 PRINT"[215][200][197][206][197][214][197][210][160][217][207][213][160][215][193][206][212][160][212][207][160][204][201][211][212][160][193][160][208][210][207][199][210][193][205].
230 [153]"PEEK(null)ATNLEN(null)VAL(null)(null)CLOSERIGHT$(null)STR$RIGHT$LENATN(null)VALCLOSE(null)(null)VALLENRIGHT$ATN(null)CLOSELENLEFT$ATN(null)ATNLEN(null)VAL(null)(null).
240 PRINT"[198][207][210][160][197][216][193][205][208][204][197]:  [155]<CLR>[129]  CLEAR SCREEN
250 [153],"    LIST<GRA3>FOR LIGHT GRAY
260 PRINT,"    [155]<[193]>   [129] SHIFT-[193] (SPADE)
270 [153],"    LIST<*ATN>  FOR LOGO-ATN (CORNER)DEF